Intro

Look at some variables that usually get ignored

###Packages

library(tidyverse)
library(ggthemes)
library(readxl)
library(janitor)
library(data.table)
library(scales)

Data

From the SG SIMD2020 webpage

simd <- read_excel("raw_data/SIMD_2020_Datazone_lookup_tool.xlsx", sheet = 3)
simd %>% 
  select(IZname, LAname,SIMD2020_Access_Domain_Rank,
         SIMD2020_Crime_Domain_Rank,SIMD2020_Decile,
         SIMD2020_Income_Domain_Rank, SIMD2020_Employment_Domain_Rank,
         SIMD2020_Education_Domain_Rank, SIMD2020_Health_Domain_Rank,
         SIMD2020_Housing_Domain_Rank, SIMD2020_Income_Domain_Rank) %>% 
  rename(Access = SIMD2020_Access_Domain_Rank,
         Crime = SIMD2020_Crime_Domain_Rank,
         Decile = SIMD2020_Decile,
         Income = SIMD2020_Income_Domain_Rank, 
         Employment = SIMD2020_Employment_Domain_Rank,
         Education = SIMD2020_Education_Domain_Rank,
         Health = SIMD2020_Health_Domain_Rank,
         Housing = SIMD2020_Housing_Domain_Rank, 
         Income = SIMD2020_Income_Domain_Rank) %>% 
  tidyr::gather(key = "metric", value = "rank",-c(IZname,LAname, Decile)) -> ranked

ranked <- ranked %>% 
  mutate(rescaled_rank = rescale(rank))

Plot

ranked %>% 
   ggplot(aes(metric,y = rescaled_rank)) +
  geom_point(aes(colour = Decile), position = position_jitter(),alpha = 0.4) +
 scale_colour_viridis_c(option = "plasma") +
  facet_wrap(~ LAname, ncol = 6) + 
  theme_minimal() + 
  ggExtra::rotateTextX() +
  theme(legend.position = "bottom",
        axis.text.y = element_blank()) +
  
  labs(title = "SIMD  domain variables by IZname",
        subtitle = " grouped by Local Authority",
       x = "Domain name",
       y = "",
       fill = "SIMD decile", 
     caption = "Data from https://www.gov.scot/publications/scottish-index-of-multiple-deprivation-2020-data-zone-look-up/") 

ggsave("plots/simd_domain_plot.png", width = 20, height = 18)

Session Info

devtools::session_info()
## - Session info ----------------------------------------------------------
##  setting  value                       
##  version  R version 3.6.2 (2019-12-12)
##  os       Windows 10 x64              
##  system   x86_64, mingw32             
##  ui       RTerm                       
##  language (EN)                        
##  collate  English_United Kingdom.1252 
##  ctype    English_United Kingdom.1252 
##  tz       Europe/London               
##  date     2020-01-28                  
## 
## - Packages --------------------------------------------------------------
##  ! package     * version date       lib source        
##    assertthat    0.2.1   2019-03-21 [1] CRAN (R 3.6.1)
##    backports     1.1.5   2019-10-02 [1] CRAN (R 3.6.1)
##    broom         0.5.3   2019-12-14 [1] CRAN (R 3.6.2)
##    callr         3.3.2   2019-09-22 [1] CRAN (R 3.6.1)
##    cellranger    1.1.0   2016-07-27 [1] CRAN (R 3.6.1)
##    cli           1.1.0   2019-03-19 [1] CRAN (R 3.6.1)
##    colorspace    1.4-1   2019-03-18 [1] CRAN (R 3.6.1)
##    crayon        1.3.4   2017-09-16 [1] CRAN (R 3.6.1)
##    data.table  * 1.12.8  2019-12-09 [1] CRAN (R 3.6.2)
##    DBI           1.1.0   2019-12-15 [1] CRAN (R 3.6.2)
##    dbplyr        1.4.2   2019-06-17 [1] CRAN (R 3.6.1)
##    desc          1.2.0   2018-05-01 [1] CRAN (R 3.6.1)
##    devtools      2.2.1   2019-09-24 [1] CRAN (R 3.6.1)
##    digest        0.6.23  2019-11-23 [1] CRAN (R 3.6.1)
##    dplyr       * 0.8.3   2019-07-04 [1] CRAN (R 3.6.1)
##    ellipsis      0.3.0   2019-09-20 [1] CRAN (R 3.6.1)
##    evaluate      0.14    2019-05-28 [1] CRAN (R 3.6.1)
##    farver        2.0.3   2020-01-16 [1] CRAN (R 3.6.2)
##    fastmap       1.0.1   2019-10-08 [1] CRAN (R 3.6.1)
##    forcats     * 0.4.0   2019-02-17 [1] CRAN (R 3.6.1)
##    fs            1.3.1   2019-05-06 [1] CRAN (R 3.6.1)
##    generics      0.0.2   2018-11-29 [1] CRAN (R 3.6.1)
##    ggExtra       0.9     2019-08-27 [1] CRAN (R 3.6.2)
##    ggplot2     * 3.2.1   2019-08-10 [1] CRAN (R 3.6.1)
##    ggthemes    * 4.2.0   2019-05-13 [1] CRAN (R 3.6.2)
##    glue          1.3.1   2019-03-12 [1] CRAN (R 3.6.1)
##    gtable        0.3.0   2019-03-25 [1] CRAN (R 3.6.1)
##    haven         2.2.0   2019-11-08 [1] CRAN (R 3.6.1)
##    hms           0.5.3   2020-01-08 [1] CRAN (R 3.6.2)
##    htmltools     0.4.0   2019-10-04 [1] CRAN (R 3.6.1)
##    httpuv        1.5.2   2019-09-11 [1] CRAN (R 3.6.1)
##    httr          1.4.1   2019-08-05 [1] CRAN (R 3.6.1)
##    janitor     * 1.2.0   2019-04-21 [1] CRAN (R 3.6.1)
##    jsonlite      1.6     2018-12-07 [1] CRAN (R 3.6.1)
##    knitr         1.25    2019-09-18 [1] CRAN (R 3.6.1)
##    labeling      0.3     2014-08-23 [1] CRAN (R 3.6.0)
##    later         1.0.0   2019-10-04 [1] CRAN (R 3.6.1)
##    lattice       0.20-38 2018-11-04 [2] CRAN (R 3.6.2)
##    lazyeval      0.2.2   2019-03-15 [1] CRAN (R 3.6.1)
##    lifecycle     0.1.0   2019-08-01 [1] CRAN (R 3.6.1)
##    lubridate     1.7.4   2018-04-11 [1] CRAN (R 3.6.1)
##    magrittr      1.5     2014-11-22 [1] CRAN (R 3.6.1)
##    memoise       1.1.0   2017-04-21 [1] CRAN (R 3.6.1)
##  D mime          0.7     2019-06-11 [1] CRAN (R 3.6.0)
##    miniUI        0.1.1.1 2018-05-18 [1] CRAN (R 3.6.2)
##    modelr        0.1.5   2019-08-08 [1] CRAN (R 3.6.1)
##    munsell       0.5.0   2018-06-12 [1] CRAN (R 3.6.1)
##    nlme          3.1-142 2019-11-07 [2] CRAN (R 3.6.2)
##    pillar        1.4.2   2019-06-29 [1] CRAN (R 3.6.1)
##    pkgbuild      1.0.6   2019-10-09 [1] CRAN (R 3.6.1)
##    pkgconfig     2.0.3   2019-09-22 [1] CRAN (R 3.6.1)
##    pkgload       1.0.2   2018-10-29 [1] CRAN (R 3.6.1)
##    prettyunits   1.0.2   2015-07-13 [1] CRAN (R 3.6.1)
##    processx      3.4.1   2019-07-18 [1] CRAN (R 3.6.1)
##    promises      1.1.0   2019-10-04 [1] CRAN (R 3.6.1)
##    ps            1.3.0   2018-12-21 [1] CRAN (R 3.6.1)
##    purrr       * 0.3.3   2019-10-18 [1] CRAN (R 3.6.1)
##    R6            2.4.1   2019-11-12 [1] CRAN (R 3.6.1)
##    Rcpp          1.0.3   2019-11-08 [1] CRAN (R 3.6.1)
##    readr       * 1.3.1   2018-12-21 [1] CRAN (R 3.6.1)
##    readxl      * 1.3.1   2019-03-13 [1] CRAN (R 3.6.1)
##    remotes       2.1.0   2019-06-24 [1] CRAN (R 3.6.1)
##    reprex        0.3.0   2019-05-16 [1] CRAN (R 3.6.1)
##    rlang         0.4.2   2019-11-23 [1] CRAN (R 3.6.1)
##    rmarkdown     2.1     2020-01-20 [1] CRAN (R 3.6.2)
##    rprojroot     1.3-2   2018-01-03 [1] CRAN (R 3.6.1)
##    rstudioapi    0.10    2019-03-19 [1] CRAN (R 3.6.1)
##    rvest         0.3.5   2019-11-08 [1] CRAN (R 3.6.1)
##    scales      * 1.1.0   2019-11-18 [1] CRAN (R 3.6.1)
##    sessioninfo   1.1.1   2018-11-05 [1] CRAN (R 3.6.1)
##    shiny         1.4.0   2019-10-10 [1] CRAN (R 3.6.1)
##    stringi       1.4.4   2020-01-09 [1] CRAN (R 3.6.2)
##    stringr     * 1.4.0   2019-02-10 [1] CRAN (R 3.6.1)
##    testthat      2.3.1   2019-12-01 [1] CRAN (R 3.6.2)
##    tibble      * 2.1.3   2019-06-06 [1] CRAN (R 3.6.1)
##    tidyr       * 1.0.0   2019-09-11 [1] CRAN (R 3.6.1)
##    tidyselect    0.2.5   2018-10-11 [1] CRAN (R 3.6.1)
##    tidyverse   * 1.3.0   2019-11-21 [1] CRAN (R 3.6.2)
##    usethis       1.5.1   2019-07-04 [1] CRAN (R 3.6.1)
##    vctrs         0.2.1   2019-12-17 [1] CRAN (R 3.6.2)
##    viridisLite   0.3.0   2018-02-01 [1] CRAN (R 3.6.1)
##    withr         2.1.2   2018-03-15 [1] CRAN (R 3.6.1)
##    xfun          0.12    2020-01-13 [1] CRAN (R 3.6.2)
##    xml2          1.2.2   2019-08-09 [1] CRAN (R 3.6.1)
##    xtable        1.8-4   2019-04-21 [1] CRAN (R 3.6.1)
##    yaml          2.2.0   2018-07-25 [1] CRAN (R 3.6.0)
##    zeallot       0.1.0   2018-01-28 [1] CRAN (R 3.6.1)
## 
## [1] C:/Users/datag/OneDrive/Documents/R/win-library/3.6
## [2] C:/Program Files/R/R-3.6.2/library
## 
##  D -- DLL MD5 mismatch, broken installation.